home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-19 / ansi1.zip / ANSI.DOC < prev    next >
Text File  |  1991-09-06  |  3KB  |  54 lines

  1.                             09-06-91
  2. This is the Geometric Tolerancing routine we use at Graham Co.,    Milwaukee.
  3. You are free to do want you want to these files.  If you have any
  4. comments, I can be contacted via CompuServe; Ralph Chapman 70314,1672.
  5.  
  6. ; Add this line to your menu file ***pop (pulldown) section
  7. [Geometric Tol.](load "c:/acad/data/ansi") ansi
  8.  
  9. ; Add the following lines in your ***icon menu section
  10. **ansi
  11. [Select Geometric Tolerance Block]
  12. [ansi(STRA)]^c^c(command "insert" "*c:/acad/data/STRA" INPT "1" "0" "text";+
  13. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  14. [ansi(FLAT)]^c^c(command "insert" "*c:/acad/data/FLAT" INPT "1" "0" "text";+
  15. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  16. [ansi(CIRC)]^c^c(command "insert" "*c:/acad/data/CIRC" INPT "1" "0" "text";+
  17. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  18. [ansi(CYL)]^c^c(command "insert" "*c:/acad/data/CYL" INPT "1" "0" "text";+
  19. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  20. [ansi(PROF)]^c^c(command "insert" "*c:/acad/data/PROF" INPT "1" "0" "text";+
  21. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  22. [ansi(PROL)]^c^c(command "insert" "*c:/acad/data/PROL" INPT "1" "0" "text";+
  23. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  24. [ansi(ANG)]^c^c(command "insert" "*c:/acad/data/ANG" INPT "1" "0" "text";+
  25. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  26. [ansi(PERY)]^c^c(command "insert" "*c:/acad/data/PERY" INPT "1" "0" "text";+
  27. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  28. [ansi(PARA)]^c^c(command "insert" "*c:/acad/data/PARA" INPT "1" "0" "text";+
  29. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  30. [ansi(POS)]^c^c(command "insert" "*c:/acad/data/POS" INPT "1" "0" "text";+
  31. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  32. [ansi(CONC)]^c^c(command "insert" "*c:/acad/data/CONC" INPT "1" "0" "text";+
  33. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  34. [ansi(RUN)]^c^c(command "insert" "*c:/acad/data/RUN" INPT "1" "0" "text";+
  35. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  36. [ansi(RUNT)]^c^c(command "insert" "*c:/acad/data/RUNT" INPT "1" "0" "text";+
  37. "c" "@0.729,0.108" ".125" "0" TOL "text" "c" "@0.567,0" ".125" "0" DAT)
  38. [ansi(exit)]^c^c
  39.  
  40.  
  41. Notes:
  42.      This routine is set up to be copied & run in a directory named
  43. C:\ACAD\DATA.  Also, the blocks will be inserted on a layer called "DIM"
  44. with color "GREEN".  If you wish to run this with different parameters,
  45. just change the appropriate sections.
  46.  
  47.     The file ANSI.ZIP should contain the following files:
  48.         ANG.DWG        CONC.DWG    CYL.DWG
  49.         FLAT.DWG    PARA.DWG    PERY.DWG
  50.         PROF.DWG    CIRC.DWG    PROL.DWG
  51.         RUN.DWG        RUNT.DWG    STRA.DWG
  52.         POS.DWG        ANSI.LSP    ANSI.DOC
  53.         ANSI.SLB
  54.